home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Source Code / Visual Basic Source Code.iso / vbsource / mathtu1a / statsfrm.frm < prev    next >
Text File  |  1999-10-07  |  3KB  |  103 lines
  1. VERSION 5.00
  2. Begin VB.Form StatsFrm 
  3.    BorderStyle     =   4  'Fixed ToolWindow
  4.    Caption         =   "Math Tutor:  Stats"
  5.    ClientHeight    =   3615
  6.    ClientLeft      =   45
  7.    ClientTop       =   285
  8.    ClientWidth     =   1935
  9.    LinkTopic       =   "Form1"
  10.    MaxButton       =   0   'False
  11.    MinButton       =   0   'False
  12.    ScaleHeight     =   3615
  13.    ScaleWidth      =   1935
  14.    ShowInTaskbar   =   0   'False
  15.    StartUpPosition =   2  'CenterScreen
  16.    Begin VB.CommandButton OK 
  17.       Caption         =   "OK"
  18.       Height          =   255
  19.       Left            =   120
  20.       TabIndex        =   6
  21.       ToolTipText     =   "OK"
  22.       Top             =   3240
  23.       Width           =   1695
  24.    End
  25.    Begin VB.ListBox Times 
  26.       Height          =   2010
  27.       Left            =   120
  28.       TabIndex        =   4
  29.       ToolTipText     =   "Times"
  30.       Top             =   1080
  31.       Width           =   1695
  32.    End
  33.    Begin VB.Label Label2 
  34.       Alignment       =   2  'Center
  35.       BorderStyle     =   1  'Fixed Single
  36.       Caption         =   "Time"
  37.       Height          =   255
  38.       Left            =   120
  39.       TabIndex        =   5
  40.       ToolTipText     =   "Time"
  41.       Top             =   840
  42.       Width           =   1695
  43.    End
  44.    Begin VB.Label NumWrong 
  45.       Height          =   255
  46.       Left            =   960
  47.       TabIndex        =   3
  48.       ToolTipText     =   "# Wrong"
  49.       Top             =   480
  50.       Width           =   855
  51.    End
  52.    Begin VB.Label NumRight 
  53.       Height          =   255
  54.       Left            =   960
  55.       TabIndex        =   2
  56.       ToolTipText     =   "# Right"
  57.       Top             =   120
  58.       Width           =   855
  59.    End
  60.    Begin VB.Label Label1 
  61.       Caption         =   "# Wrong:"
  62.       Height          =   255
  63.       Index           =   1
  64.       Left            =   120
  65.       TabIndex        =   1
  66.       ToolTipText     =   "# Wrong"
  67.       Top             =   480
  68.       Width           =   735
  69.    End
  70.    Begin VB.Label Label1 
  71.       Caption         =   "# Right:"
  72.       Height          =   255
  73.       Index           =   0
  74.       Left            =   120
  75.       TabIndex        =   0
  76.       ToolTipText     =   "# Right"
  77.       Top             =   120
  78.       Width           =   615
  79.    End
  80. End
  81. Attribute VB_Name = "StatsFrm"
  82. Attribute VB_GlobalNameSpace = False
  83. Attribute VB_Creatable = False
  84. Attribute VB_PredeclaredId = True
  85. Attribute VB_Exposed = False
  86. 'Name:  Math Tutor
  87. 'Author:  InfraRed
  88. 'Contact Info:  ICQ #:   17948286
  89. '               E-Mail:  InfraRed@flashmail.com
  90. '----------------Code Starts Here------------------
  91.  
  92. Private Sub Form_Unload(Cancel As Integer) 'Unload the program
  93. Unload TutorFrm
  94. Unload SetupFrm
  95. Unload Me
  96. End
  97. End Sub
  98.  
  99. Private Sub OK_Click() 'Move on to setup the next tutor "class"
  100. SetupFrm.Show
  101. StatsFrm.Hide
  102. End Sub
  103.